<?php

namespace Home\Service;

use Org\Util\String;

class WordpressSyncerService
{
    private static $db_conn_str = null;
    private static $db_table_prefix = null;

    private static function prepare()
    {
        if (null === self::$db_conn_str) {
            $host = tpx_config_get('wordpress_syncer_db_host', 'localhost');
            $user = tpx_config_get('wordpress_syncer_db_user', 'root');
            $pwd = tpx_config_get('wordpress_syncer_db_pwd', '');
            $name = tpx_config_get('wordpress_syncer_db_name', 'wordpress');
            $prefix = tpx_config_get('wordpress_syncer_db_prefix', 'wp_');

            self::$db_conn_str = "mysql://$user:$pwd@$host/$name#utf8";
            self::$db_table_prefix = $prefix;
        }
    }

    public static function M($model)
    {
        self::prepare();
        return M($model, self::$db_table_prefix, self::$db_conn_str);
    }

    public static function get_category()
    {

        $categorys = self::M('Terms')
            ->table('__TERMS__ t')
            ->join('__TERM_TAXONOMY__ tt ON t.term_id=tt.term_id')
            ->field('t.term_id as id,t.name as title,tt.parent as pid')
            ->where(array('tt.taxonomy' => 'category'))
            ->select();
        if (empty($categorys)) {
            $categorys = array();
        }

        foreach ($categorys as &$r) {
            $r['title'] = htmlspecialchars_decode($r['title']);
        }

        $categorys = node_merge($categorys, 0, 'id', 'pid', 'nodes');

        return $categorys;
    }

    public static function get_wpuid_by_tpxuid($tpxuid)
    {
        $user_map = M('WordpressSyncerUserMap')->where(array('uid' => intval($tpxuid)))->find();
        if (empty($user_map)) {
            return 0;
        }
        return intval($user_map['wp_id']);
    }

    public static function get_wppostid_by_tpxdocid($docid)
    {
        $one = M('WordpressSyncerDocMap')->where(array('doc_id' => intval($docid)))->find();
        if (empty($one)) {
            return 0;
        }
        return intval($one['wp_id']);
    }

    public static function login($username, $password, &$ret_uid)
    {
        if (empty($username) || empty($password)) {
            return '用户名或密码为空';
        }

        $wp_user = self::M('Users')->where(array('user_login' => $username))->find();
        if (empty($wp_user)) {
            return '用户不存在';
        }

        $hasher = new PasswordHash(8, true);
        $check = $hasher->CheckPassword($password, $wp_user['user_pass']);

        if (!$check) {
            return '登录验证失败';
        }

        $user_map = M('WordpressSyncerUserMap')->where(array('wp_id' => $wp_user['id']))->find();
        if (empty($user_map)) {
            $am = D('Member', 'Service');
            $ret = null;
            // 首先尝试使用用户名注册
            $ret = $am->register($email = '', $cellphone = '', $username = $wp_user['user_login'], $password = String::randString(6), $add_data = array(), $ret_uid);
            if (true !== $ret) {
                do {
                    $ret = $am->register($email = '', $cellphone = '', $username = 'wp_' . String::randString(17, 3), $password = String::randString(6), $add_data = array(), $ret_uid);
                } while (true !== $ret);
            }
            M('WordpressSyncerUserMap')->add(array(
                'wp_id' => $wp_user['id'],
                'uid' => $ret_uid
            ));
            $ret_uid = $ret_uid;
            cookie('docmz_user_intro', 1, array('expire' => 365 * 24 * 3600, 'httponly' => false, 'path' => __ROOT__));
        } else {
            $ret_uid = $user_map['uid'];
        }
        return true;
    }

    public static function set_categorys($post_id, $categorys)
    {
        $tt = self::M('term_relationships');

        // 找到term_id->term_taxonomy_id映射
        $data = self::M('TermTaxonomy')
            ->field('term_taxonomy_id,term_id')
            ->where(array('taxnomy' => 'category'))
            ->select();

        $map = array();
        if (!empty($data)) {
            foreach ($data as &$r) {
                $map[$r['term_id']] = $r['term_taxonomy_id'];
            }
        }

        // 删除旧的分类
        $data = self::M('TermRelationships')
            ->where(array(
                'term_taxonomy_id' => array('IN', $map),
                'object_id' => $post_id
            ))
            ->delete();

        // 增加新的分类
        $data = array();
        foreach ($categorys as $r) {
            if (isset($map[$r])) {
                $data[] = array(
                    'object_id' => $post_id,
                    'term_taxonomy_id' => $map[$r]
                );
            }
        }

        if (!empty($data)) {
            self::M('TermRelationships')->addAll($data);
        }

    }
}

class PasswordHash
{
    var $itoa64;
    var $iteration_count_log2;
    var $portable_hashes;
    var $random_state;

    /**
     * PHP5 constructor.
     */
    function __construct($iteration_count_log2, $portable_hashes)
    {
        $this->itoa64 = './0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';

        if ($iteration_count_log2 < 4 || $iteration_count_log2 > 31)
            $iteration_count_log2 = 8;
        $this->iteration_count_log2 = $iteration_count_log2;

        $this->portable_hashes = $portable_hashes;

        $this->random_state = microtime() . uniqid(rand(), TRUE); // removed getmypid() for compatibility reasons
    }

    /**
     * PHP4 constructor.
     */
    public function PasswordHash($iteration_count_log2, $portable_hashes)
    {
        self::__construct($iteration_count_log2, $portable_hashes);
    }

    function get_random_bytes($count)
    {
        $output = '';
        if (@is_readable('/dev/urandom') &&
            ($fh = @fopen('/dev/urandom', 'rb'))
        ) {
            $output = fread($fh, $count);
            fclose($fh);
        }

        if (strlen($output) < $count) {
            $output = '';
            for ($i = 0; $i < $count; $i += 16) {
                $this->random_state =
                    md5(microtime() . $this->random_state);
                $output .=
                    pack('H*', md5($this->random_state));
            }
            $output = substr($output, 0, $count);
        }

        return $output;
    }

    function encode64($input, $count)
    {
        $output = '';
        $i = 0;
        do {
            $value = ord($input[$i++]);
            $output .= $this->itoa64[$value & 0x3f];
            if ($i < $count)
                $value |= ord($input[$i]) << 8;
            $output .= $this->itoa64[($value >> 6) & 0x3f];
            if ($i++ >= $count)
                break;
            if ($i < $count)
                $value |= ord($input[$i]) << 16;
            $output .= $this->itoa64[($value >> 12) & 0x3f];
            if ($i++ >= $count)
                break;
            $output .= $this->itoa64[($value >> 18) & 0x3f];
        } while ($i < $count);

        return $output;
    }

    function gensalt_private($input)
    {
        $output = '$P$';
        $output .= $this->itoa64[min($this->iteration_count_log2 +
            ((PHP_VERSION >= '5') ? 5 : 3), 30)];
        $output .= $this->encode64($input, 6);

        return $output;
    }

    function crypt_private($password, $setting)
    {
        $output = '*0';
        if (substr($setting, 0, 2) == $output)
            $output = '*1';

        $id = substr($setting, 0, 3);
        # We use "$P$", phpBB3 uses "$H$" for the same thing
        if ($id != '$P$' && $id != '$H$')
            return $output;

        $count_log2 = strpos($this->itoa64, $setting[3]);
        if ($count_log2 < 7 || $count_log2 > 30)
            return $output;

        $count = 1 << $count_log2;

        $salt = substr($setting, 4, 8);
        if (strlen($salt) != 8)
            return $output;

        # We're kind of forced to use MD5 here since it's the only
        # cryptographic primitive available in all versions of PHP
        # currently in use.  To implement our own low-level crypto
        # in PHP would result in much worse performance and
        # consequently in lower iteration counts and hashes that are
        # quicker to crack (by non-PHP code).
        if (PHP_VERSION >= '5') {
            $hash = md5($salt . $password, TRUE);
            do {
                $hash = md5($hash . $password, TRUE);
            } while (--$count);
        } else {
            $hash = pack('H*', md5($salt . $password));
            do {
                $hash = pack('H*', md5($hash . $password));
            } while (--$count);
        }

        $output = substr($setting, 0, 12);
        $output .= $this->encode64($hash, 16);

        return $output;
    }

    function gensalt_extended($input)
    {
        $count_log2 = min($this->iteration_count_log2 + 8, 24);
        # This should be odd to not reveal weak DES keys, and the
        # maximum valid value is (2**24 - 1) which is odd anyway.
        $count = (1 << $count_log2) - 1;

        $output = '_';
        $output .= $this->itoa64[$count & 0x3f];
        $output .= $this->itoa64[($count >> 6) & 0x3f];
        $output .= $this->itoa64[($count >> 12) & 0x3f];
        $output .= $this->itoa64[($count >> 18) & 0x3f];

        $output .= $this->encode64($input, 3);

        return $output;
    }

    function gensalt_blowfish($input)
    {
        # This one needs to use a different order of characters and a
        # different encoding scheme from the one in encode64() above.
        # We care because the last character in our encoded string will
        # only represent 2 bits.  While two known implementations of
        # bcrypt will happily accept and correct a salt string which
        # has the 4 unused bits set to non-zero, we do not want to take
        # chances and we also do not want to waste an additional byte
        # of entropy.
        $itoa64 = './ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';

        $output = '$2a$';
        $output .= chr(ord('0') + $this->iteration_count_log2 / 10);
        $output .= chr(ord('0') + $this->iteration_count_log2 % 10);
        $output .= '$';

        $i = 0;
        do {
            $c1 = ord($input[$i++]);
            $output .= $itoa64[$c1 >> 2];
            $c1 = ($c1 & 0x03) << 4;
            if ($i >= 16) {
                $output .= $itoa64[$c1];
                break;
            }

            $c2 = ord($input[$i++]);
            $c1 |= $c2 >> 4;
            $output .= $itoa64[$c1];
            $c1 = ($c2 & 0x0f) << 2;

            $c2 = ord($input[$i++]);
            $c1 |= $c2 >> 6;
            $output .= $itoa64[$c1];
            $output .= $itoa64[$c2 & 0x3f];
        } while (1);

        return $output;
    }

    function HashPassword($password)
    {
        if (strlen($password) > 4096) {
            return '*';
        }

        $random = '';

        if (CRYPT_BLOWFISH == 1 && !$this->portable_hashes) {
            $random = $this->get_random_bytes(16);
            $hash =
                crypt($password, $this->gensalt_blowfish($random));
            if (strlen($hash) == 60)
                return $hash;
        }

        if (CRYPT_EXT_DES == 1 && !$this->portable_hashes) {
            if (strlen($random) < 3)
                $random = $this->get_random_bytes(3);
            $hash =
                crypt($password, $this->gensalt_extended($random));
            if (strlen($hash) == 20)
                return $hash;
        }

        if (strlen($random) < 6)
            $random = $this->get_random_bytes(6);
        $hash =
            $this->crypt_private($password,
                $this->gensalt_private($random));
        if (strlen($hash) == 34)
            return $hash;

        # Returning '*' on error is safe here, but would _not_ be safe
        # in a crypt(3)-like function used _both_ for generating new
        # hashes and for validating passwords against existing hashes.
        return '*';
    }

    function CheckPassword($password, $stored_hash)
    {
        if (strlen($password) > 4096) {
            return false;
        }

        $hash = $this->crypt_private($password, $stored_hash);
        if ($hash[0] == '*')
            $hash = crypt($password, $stored_hash);

        return $hash === $stored_hash;
    }
}